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CLOK - AX08 RC CLOCK OR EXTERNAL CLOCK FREQUENCY 
OR PERIOD MEASUREMENT 


DECUS Program Library Write-up 


DEC US No. 8-264 


PROGRAM UTILIZATION 

Load Floating point package 2 
Load program CLOK 

Set 200 on Switch Register. Load address. Depress start. 

Select SR (0) = 0 if Frequency measurement 
= 1 if Period measurement 
SR (1) = 0 if normal RC clock rate 
= 1 if RC clock slowed by 8 
SR (2) = 0 if RC clock 

= 1 if External clock 

.j ■ * ' 

PROGRAM DESCRIPTION . 

I 

The first operation is loading the enable register of AX08 by : V 
0402 if RC clock flag 

4402 if RC clock slowed by 8 ’ 

0404 if external clock is to be measured. 

Then the program wait for the first clock pulse. 

Interrupt is enabled and the program counts simultaneously the number 
of RC or External clock pulses and the number of crystal clock pulses 
(10 KHz) by program interrupt. 

The respective floating counters are NBRRC and NBCRY. 

When more than M 2 x 4096 (in this case 8192) crystal clock pulses and 
more than one RC or External clock pulse occur, the calcul of the 
Frequency or of the period is done and the result typed out on ASR 33 . 


Frequency is calculated in the folowing way : 


NBRRC 

NBCRY 


x 10 000 Herz 


and the period : 


1000 

- milliseconds 


Frequency 















LIMITATIONS. 


The maximum Frequency measurable is given by the time for executing one 
loop of the program (about 90 microseconds). The maximum Frequency is 
then more than 10 KHz. 

Minimum Frequency is function of the capacity of NBCRY which is 
2048 x 4096 8 x 10^. This minimum is loV 8 x 10^ = 0,00125 Hz 

(10^ is the Frequency of the crystal clock). 

OUTPUT FORMAT . 

The total number of digit outputted may be changed by setting the new 
number in address 62. 

In the same way, number of digit of the decimal part must be put in 
P4 (address 341) 

PRECISION . 

Precision of the measure may be augmented by changing the contain of 
M2 (address 342). 

The precision is given by - • 

M2 x 4096 

The measure time is then as much augmented as the precision increase. 


RESTRICTIONS . 

When this program is used for measuring external clock and no signal 
is applied, the program is always waiting. 

It may be restarted at address 200. 
















EXAMPLE OF RC CLOCK MEASUREMENT AND ADJUSTMENT 


♦ 

• 6944 

i HZ 

♦ 

• 6944 

HZ 

♦ 

• 6944 

HZ 

♦ 

1439*9000 

MS 

♦ 

1440*0010 

MS 

♦ 

1440*0010 

MS 

♦ 

9*7680 

MS 

♦ 

265*7250 

MS 

♦ 

265*7250 

MS 

♦ 

265*7250 

MS 

♦ 

3*7632 

HZ 

♦ 

3*7632 

HZ 

♦ 

3*7629 

HZ 

4 

3*7632 

HZ 

4 

143*0302 

HZ 

4 

14*2874 

HZ 

4 

14*2874 

HZ 

4 

14*2874 

HZ 

4 

264*4668 

HZ 

4 

100*6548 

HZ 

4 

100*6548 

HZ 

4 

100*6792 

HZ 

4 

100*6670 

HZ 

4 

100*6304 

HZ 

4 

105*2631 

HZ 

4 

105*2504 

HZ 

4 

222*2222 

HZ 

4 

222*2222 

HZ 

4 

219*8736 

HZ 

4 

290*7542 

HZ 

4 

521*9510 

HZ 

4 

894*3386 

HZ 

4 

894*3386 

HZ 

4 

943*0278 

HZ 

4 

984*6267 

HZ 

4 

1008*7820 

HZ 

4 

1027*7060 

HZ 

4 

1024*7650 

HZ 

4 

1023*1700 

HZ 

4 

1019*5120 

HZ 

4 

1017*9410 

HZ 

4 

1015*8530 

HZ 

4 

1014*6340 

HZ 

4 

1013*0590 

HZ 

4 

1009*0280 

HZ 

4 

1005*1230 

HZ 


♦ 1004*2700 HZ 

♦ 1002*1970 HZ 

♦ 1001*2190 HZ 

♦ 1000*6090 HZ 

♦ 1000*3650 HZ 

♦ 1000*2430 HZ 
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+ .9997 MS 

♦ .9997 MS 

♦ .9998 MS 
4 1000*1210 HZ 

♦ 1000.1210 HZ 

♦ 1000*1210 HZ 

♦ 999.2679 HZ 

♦ 999.5119 HZ 

♦ 1000.0000 HZ 

♦ 1000.1210 HZ 

♦ 1.0000 MS 

♦ 1 .0000 MS 

♦ 1000.0000 HZ 
4 1000.0000 HZ 

♦ 1.0001 MS 

♦ 1.0000 MS 

♦ 1.0000 MS 

♦ 1000.0000 HZ 

♦ 1000.0000 HZ 

♦ 8000*4880 HZ 

♦ 7999*2670 HZ 

♦ 8000*4880 HZ 

♦ *1249 MS 

4 *1249 MS 

4 *1249 MS 

♦ *1250 MS 

4 *1249 MS 

4 .1250 MS 

4 *1148 MS 

4 *1102 MS 

♦ 9090*5760 HZ 
4 9538*5740 HZ 
4 9763*1830 HZ 
4 9920*6540 HZ 
♦10074*4600 HZ 
♦10093*9900 HZ 
♦10069*5800 HZ 

♦ 10062*2500 HZ 

♦ 10051*2600 HZ 
♦10035*3900 HZ 
♦10032*9500 HZ 
♦10019*5300 HZ 
♦10018*3100 HZ 
♦10012*2000 HZ 
♦10003*6600 HZ 
♦10004*8800 HZ 

♦ .0999 MS 

♦ .0999 MS 

♦ .0999 MS 

♦ .0999 MS 

♦ *1000 MS 

♦ *1000 MS 

♦ 9996*3370 HZ 

♦ 9995*1170 HZ 

♦ .1000 MS 

♦ *1000 MS 

♦ 9995*1170 HZ 

♦ 9996*3370 HZ 
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0001 - 


« * 




ADCRYH 
ADCRYL 
8 LAN 
CR 

DEBUT 

H 

LF 

M 

M2 

NBCRY 
N8CRYH 
NBCRYL 
N8RRC 
NBRRCH 
NBRRCL 
P 1000 
P10000 
P 4 
P 402 
P 40 4 
S 

S TART 
S WITCH 
TYPE 
WAIT 
ZED 


0021 
0022 
0356 
0351 
0200 
0362 
0352 
0357 
0342 
0346 
0347 
0350 
0343 
0344 
0345 
0353 
0336 
0341 
033 5 
0334 
0360 
0333 
0363 
0364 
0227 
0361 


EX1ERNAL CLOCK FREQUENCY OR PERIOD MEASUREMENT 


XLIST 
PAUSE 

/AX08 RC OR 
/AL:5/10/70 
/OPTION ON SWITCH REGISTER 
/SRC0) 0 FREQUENCY MEASUREMENT 
1 PERIOD " 

0 RC CLOCK FLAG EVERY 4 
1 RC CLOCK SLOWED BY 
0 RC CLOCK 
1 EXTERNAL 


/ 

/SRC 1 ) 
/ 

/SR(2) 
/ 


CLOCK PULSES 
8CRC CLOCK FLAG 


OR EVERY 
EVERY 32 


ext clock 

RC PULSE 


/THIS 

*0 


PROGRAM MUST 


CLOCK 
BE LOADED 


WITH FLOATING 2 


0000 

0000 

0 

0001 

6352 

CLXK 

0002 

2022 

ISZ ADCRYL 

0003 

7410 

SKP 

0 00 4 

2021 

ISZ ADCRYH 

0005 

600 1 

ION 

0 006 

5400 

JMP I 0 

0007 

5600 

5600 



*20 

0 020 

7200 

7200 

0021 

0000 

ADCRYH*0 /NUM 

0022 

0000 

ADCRYL* 0 



*62 

0062 

001 1 

ll /N8ER OF DIGIT TO 



*200 

0200 

7604 

DEBUT*CLA OSR 


3ER OF CRYSTAL CLOCK BETWEEN 2 RC CLOCKS 
BE OUTPUTTED 
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- 002 - 


0 201 

7004 

RAL 


0202 

*7710 

SPA 

CLA 

0203 

7330 

CLA 

CLL CML RAR 

0204 

3333 

DCA 

START 

0 20 5 

7 60 4 

CLA 

OSR- 

0 20 6 

7006 

RTL 


0207 

7710 

SPA 

CLA 

0210 

5213 

JMP 

.+3 

021 l 

1 335 

TAD 

P 402 

0212 

7410 

SKP 


0213 

1 33 4 

TAD 

P 40 4 

0214 

1 333 

TAD 

START 

0215 

6346 

ZTEN OTEN 

0216 

3346 

DCA 

NBCRY 

0217 

3344 

DCA 

NBRRCH 

0 220 

3345 

DCA 

N8RRCL 

0221 

3350 

DCA 

nbcryl 


0222 3347 DCA NBCRYH 

0224 6341 SKRK /WAIT FOR FIRST RC CLOCK PULSE 

0225 5224 JMP • "1 

0226 6354 CLRK 

0227 3021 WAIT* DCA ADCRYH 

0230 3022 DCA ADCRYL 

0231 6001 ION 

0232 6341 SKRK 

0233 5232 JMP •“1 /WAIT CLOCK PULSE 

0 234 6002 I OF 

0235 6354 CLRK 


0236 

2345 

ISZ nbrrcl 

0237 

7 413 

SKP 

0 2 40 

2344 

ISZ NBRRCH 

0241 

7300 

CLA CLL 

0 2 42 

1350 

TAD NBCRYL 

0243 

1022 

TAD ADCRYL 

0244 

3350 

DCA NBCRYL 

0 2 45 

700 4 

RAL 

0246 

1 347 

TAD NBCRYH 

0247 

1021 

TAD ADCRYH 

0 2 50 

3347 

DCA NBCRYH 

0251 

1 347 

TAD NBCRYH 

0 2 52 

13 42 

TAD M2 

0253 

7710 

SPA CLA 

0254 

5227 

JMP WAIT 

0255 

4407 

JMS I 7 

0256 

5346 

FGET NBCRY 

0257 

7000 

FNOR 

0 2 60 

6346 

FPUT NBCRY 

0261 

5343 

FGET NBRRC 

0262 

7000 

FNOR 

0263 

4346 

FDIV NBCRY 

0264 

3336 

FMPY P10000 

0265 

0000 

FEXT 

0266 

7 60 4 

CLA OSR 

0267 

3363 

DCA SWITCH 

0270 

1 363 

TAD SWITCH 

0271 

7700 

SMA CLA 

0272 

5300 

JMP •+6 
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- ^03- 


0273 

4407 

JMS I 7 

0274 

6346 

FPUT N8CRY 

0275 

5353 

FGET P1000 

0276 

4346 

FDIV N8CRY 

0277 

0000 

FEX' 

0 300 

7200 

CLA 

0 301 

6046 

TLS 

0 302 

1 341 

TAD P4 

0 303 

4420 

JMS I 20/OUTPUT 

0 30 4 

7200 

CLA 

0 305 

1356 

TAD 8LAN 

0 306 

4364 

JMS TYPE 

0 307 

1363 

TAD SWITCH 

0310 

7700 

SMA CLA 

0 311 

5317 

JMP .+6 

0312 

1357 

TAD M 

0313 

4364 

JMS TYPE 

0314 

1 360 

TAD S 

0315 

43 64 

JMS TYPE 

0 316 

5323 

JMP .+5 

0317 

13 62 

TAD H 


routine .FLOATING 2 


0 320 
0 321 
0 322 
0 323 
0324 
0 325 
0 32 6 
0327 
0 330 
0331 
0 332 
0333 
0 334 
0 33 5 
0 336 
0 337 
0 340 
0 341 
0 342 
0 343 
0344 
0345 
0 346 
0347 
0 350 
0351 
0 352 
0353 
0354 
0 355 
0 356 
0 357 
0 360 
0 361 
0 362 
0363 
0 364 


4364 
1 361 
4364 
1351 
4364 
1 3 52 
4364 
60 41 
5327 
60 42 
5200 
0000 
0 40 4 
0 402 
001 6 
23 42 
0000 
000 4 
7776 
0000 
0000 
0000 
0000 
0000 
0000 
0215 
0212 
0012 
3720 
0000 
0240 
031 5 
0323 
0332 
0310 
0000 
0000 


JMS TYPE 
TAD ZED 
JMS TYPE 
TAD cr 
JMS TYPE 
TAD LF 
JMS TYPE 
TSF 

JMP . -1 
TCF 

JMP DEBUT 
START , 0 
P 40 4 , 40 4 
P 402 , 402 
P10000,16 
2342 
0 

P4,4 /NUMBER 
M2, -3 
N8RRC,0 /EXPONENT 

N8RRCH,0 /NRRE DE RC CLOCK 
NBRRCL,0 

N8CR Y,0 /EXPONENT 

Spv, H 'f /NUM8ER ° F CRYSTAL CLOCK 

iMo U K Y L * 0 
CR,2 1 5 
LF,212 
P1000,12 
3720 
0 

8LAN,2 40 
M , 3 1 5 
S, 323 
ZED,332 
H, 3 1 0 
SWITCH,0 
TYPE,0 


OF DIGIT OF THE DECIMAL PART 










0004 - 


0365 6041 

0366 5365 

0367 6046 

0370 7200 

0371 5764 


TSF 

JMP *-l 

TLS 

CLA 

JMP I TYPE 











* OPT - *■ 

* OUT-T: 

* 

* IN-S:SYMB>S : CLOK 

* 

* 

*OPT-T 


8 @3*<0 * • @ :@2B>8?J>8?*<3&&$%( ' 3> 3 ! *3*03! *03* %< $* ( (8' * '"?*$ + &83<£ + 08£&>33?B 
0!+50&s /43 
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